Top 10k strings from Hexagonia (2001)(VTS).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TZX] /
Back to the directory listing
10 +AUTOLIST)*19 7 6 5 K(PLAYER)=K(PLAYER)+1 4 MEHE=MEHE-1 4 GREAT=GREAT*SPG 3 WCLS 0,0,32,17 3 MEHET=MEHET+1 3 AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPPQQRRSSTTUUVVWWXXYYZZ aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzzABCDEFGHIJKLMNOPQRSTUVWXYABCDERGHIJKLMNOPQRSTUVWXYZabcder0fghijklmnopqrstuvxyz 3 AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPPQQRRSSTTUUVVWWXXYYZZ aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzzABCDEFGHIJKLMNOPQRSTUVWXYABCDERGHIJKLMNOPQRSTUVWXYZabcder0fghijklmnopqrstuvxyz 2 SETUPA=5110 2 PLAYER=PLAYER+1 2 PAPERBOY;X$: 2 P(PLAYER)=0 2 AUTOLIST=0 2 ;" ": 2 ;" " 2 *ZRUS22+INI2); 2 ******************************************************************** 2 (AKAVICS+PLAYER), 2 (ACCONT+PLAYER), 2 (ACCONT+PLAYER) 2 1 ZRUS2=ZRUS22: 1 ZRUS22=ZRUS2: 1 ZRUS1=ZRUS12: 1 ZRUS12=ZRUS1: 1 WCLS 14,0,18,10 1 VASKO THOMAS'S SOFT 2001 1 T$="IMITATE" 1 T$="BLUE " 1 T$="BLACK " 1 SYMBOLLARGE 1 SPMX=SPMX2: 1 SPMX2=SPMX: 1 SPMX2=SPMX2- 1 SPMX2=SPMX2+ 1 SPG2=SPG2- 1 SPG2=SPG2+ 1 SOR26,ERRTY;" 1 SETUPA=5330 1 SETUPA=5210 1 SET UP <<AFTERBREAK 1 SCX,SCY;X$ 1 R$="YELLOW " 1 R$="WHITE " 1 R$="IMITATE" 1 Press ENTER to Expand the Whole Program 1 POD*ZRUS1+PAP; 1 PLAYER=(OPT2+ 1 PEPE=PEPE+1 1 PAPERBOY;X$ 1 OVERCU=OVERCU-64 1 OVERCU=OVERCU-128 1 OSSZES=K(1 1 No. STATEMENTS : 1 No. LINES : 1 No. Bytes: 1 Length of Program Only:! 1 LINE,POST;W$; 1 LINE,POST+I; 1 LINE NO:NOW RENUMBER PROGRAM 1 KLAST=K(O): 1 K(PLAYER)=K(PLAYER)-1 1 K(PLAYER)<1 1 K(O)>KLAST 1 INKINGER=KCO-((BRIGITT*64 1 INK=OVERCU-8 1 INK*ZRUS2+INI; 1 HEXX scr 1 HEXX prg 1 HEXX aux 1 HEXAGONIA-SET UP 1 HEXAGONIA 1 HELY=HELY- 1 HELY=HELY+ 1 GREAT>SPMX 1 GREAT=SPMX 1 GOTOA=2150 1 GO TO A=2500 1 GO TO A=2350 1 GO TO A=2300 1 GO TO A=2250 1 GO TO A=2200 1 First Byte: 1 FROM LINE NO:TO LINE NO:AFTER LINE NO:NOW RENUMBER PROGRAM 1 DESTROYING 1 CY=CY-GREAT: 1 CY=CY+GREAT: 1 CX=CX-GREAT: 1 CX=CX+GREAT: 1 CURSOR SYMBOL 1 CURSOR STOP " 1 COMPUTER B 1 COMPUTER A 1 BLOCK COPY 1 Auto-start Line No: 1 Array Name: 1 AUTOLIST>80 1 AUTOLIST=AUTOLIST-1 1 AUTOLIST=AUTOLIST+1 1 AUTOLIST=80 1 AUTOLIST<0 1 AKAVICS+PLAYER,CX: 1 ABORT ?"'" Y / N " 1 ;I$((AUTOLIST)*19 1 ;"UNDER: 1 ;"SPEEDING 1 ;"MAX SPEED 1 ;"COLOR: 1 ;" ";D$;" "; 1 ;" "'" 1 ;" 1 ;" 1 : 1 : 1 ------------ 1 ++F+N+++"]\*S\~ 1 *ZRUS12+PAP2);F$: 1 *ZRUS12+PAP2);F$ 1 *S\##"]\^#V 1 **********************************************************************************************************************************************AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPPQQRRSSTTUUVVWWXXYYZZaabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzzABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz 1 **************************************************************************************************************************************************************************************************************************** 1 )="YOU CAN MOVE ONLY TO EMPTY RED HEXAGON. WHEN BY SELECTED HEXAGON,WHERE YOU ARE MOVE,IS OR ARE SYMBOLS OF ENEMY PLAYER,YOU'LL COPY AND THEY'S SYMBOLS WILL IMITATE TO YOURS SYMBOLS. -THESE SYMBOLS WILL YOURS-" 1 )="WHEN A PLAYER CAN'TMOVE,HE MUST ABORT HIS GAME:CLICK AT ICON >ABORT< AND PRESS KEY Y. WHEN IN GAME STILLSONLY ONE PLAYER, THEN IS END OF GAME" 1 )="MOVES: FIRST YOU MUST SELECT ONE OF YOURSSYMBOLS.>AFTER THISYOU CAN CHANGE< -SELECTED SYMBOL- -WILL FLASHING- YOU CAN MOVE TO 6 DIRECTIONS,AND YOU CAN JUMP,OR DOUBLE.WHEN YOU MOVE TO HEXAGON BY SELECTEDHEXAGON,YOU'LL DOUBLE. WHEN YOU MOVE TO HEXAGON ONE FAR, YOU WILL JUMP." 1 )="INSTRUCTIONS: MODE A: YOU MUST MADE IMPOSSIBLE THE MOVEOF THE OTHER PLAYERS. MODE B: YOU MUST HAVE THE MOST OF YOURS SYMBOLS AT THE END OF GAME. WHEN NOBODY CAN'T MOVE,IS END OF GAME" 1 )="---------------------------------------------------------THOMAS VASKO'S SOFT-------------------DESIGN,PROGRAM, GRAPHICS,WRITTEN BY THOMAS VASKO,2001 IDEAS BY SUSAN V., PETER V.,DAVID F., THOMAS F.,THOMAS V. Z-80 CODE BY ZBYNEK NEJEDLY FOR DIDACTIC M '91 >>>>>>>BASIC<<<<<<<-------------------THANK YOU FOR PLAY THIS GAME. --------------------------------------PROGRAM:HEXAGONIA TYP:LOGIC-STRATEGIC GAME NO.:03 " 1 )+PAPERBOY*8 1 (OVERCU/64 1 (OVERCU/128 1 (CX,CY)>128 1 (CX,CY)=KCO 1 (AUTOLIST)*19 1 (ANEV+PLAYER*6 1 (ANEV+(PLAYER* 1 (AKAVICS+PLAYER)=6 1 (AKAVICS+PLAYER)=5 1 (AKAVICS+PLAYER)=4 1 (AKAVICS+PLAYER)=3 1 (AKAVICS+PLAYER)=2 1 (AKAVICS+PLAYER)=1 1 (AKAVICS+I)=6 1 (AKAVICS+I)=5 1 (AKAVICS+I)=4 1 (AKAVICS+I)=3 1 (AKAVICS+I)=2 1 (AKAVICS+I)=1 1 (ACCONT+PLAYER)=6 1 (ACCONT+PLAYER)=5 1 (ACCONT+PLAYER)=4 1 (ACCONT+PLAYER)=3 1 (ACCONT+PLAYER)=2 1 (ACCONT+PLAYER)=1 1 (ACCONT+PLAYER),OPT3 1 ((KCO-(BRIGITT*64 1 #T]##N#F#~ 1 "VTS LOGO" 1 "HEXX PRG" 1 "18";" " 1 "18"+HELY;" ": 1 STOP " 1 STONE 1 START 1 SKINHEAD 1 SINCLAIR 1 RENAME 1 PLAYER 4 1 PLAYER 3 1 PLAYER 2 1 PLAYER 1 1 OFF! 1 NEW POSITION 1 MODE B " 1 MODE A " 1 KRYSTAL 2 1 KRYSTAL 1 KIVALASZT 1 KEYBOARD R 1 KEYBOARD L 1 GAME>>>>>>> 1 EMERALD 1 CURSORS 1 CONTROLS 1 COMPUTER B 1 COMPUTER A 1 BRIGHTHEAD 1 >>> HEXAGONIA <<< 1 U G R A S 1 M A S O L A T 1 ": 1 1 1 1 1 1 1 1 1